* lisp/calc/calc-sel.el (calc-replace-sub-formula): Fix typo

Reported by Sébastien Miquel <sebastien.miquel@posteo.eu>

diff --git a/lisp/calc/calc-sel.el b/lisp/calc/calc-sel.el
index 2b317ac369664b5d3cbea90e884c3f45cbbd4744..18fd483bafed4932cdbc2d598072a4dbabc8d07b 100644 (file)
--- a/lisp/calc/calc-sel.el
+++ b/lisp/calc/calc-sel.el
@@ -486,8 +486,8 @@
 
 (defun calc-replace-sub-formula (expr rsf-old rsf-new)
   (let ((calc-rsf-old rsf-old)
-        (calc-rsf-new (calc-encase-atoms rsf-new))))
-  (calc-replace-sub-formula-rec expr))
+        (calc-rsf-new (calc-encase-atoms rsf-new)))
+    (calc-replace-sub-formula-rec expr)))
 
 (defun calc-replace-sub-formula-rec (expr)
   (cond ((eq expr calc-rsf-old) calc-rsf-new)